home *** CD-ROM | disk | FTP | other *** search
-
- ; ****************************************
- ; * *
- ; * Installationsscript für "ListCopy" *
- ; * *
- ; * installiert die CliOnly-Version *
- ; * *
- ; * $VER: 1.3 (C) by J.Reinert *
- ; * *
- ; ****************************************
-
-
- ; ****************************************
- ; Definition der globalen Konstanten
- ; ****************************************
-
- (set #prgsource "CliOnly")
- (set #prgdest "ListCopy")
- (set #destname "C:")
-
-
- ; ****************************************
- ; Definition der deutschen Texte
- ; ****************************************
-
- (set #bad-kick
- (cat ""@app-name" benötigt Amiga-OS 2.04 oder höher!\n"
- "Dies wäre jetzt der richtige Zeitpunkt, Ihren "
- "Rechner aufzuwerten. "
- )
- )
-
- (set #copy-programm "Kopieren des Programmes")
- (set #help-programm
- (cat "Haben Sie darauf geachtet, daß die Zielschublade auch nach "
- "Befehle abgesucht wird ? Mit dem Befehl 'Path' können Sie "
- "dem System ihre gewählte Schublade als zusätzlichen Such-"
- "pfad angeben."
- )
- )
-
- (set #copy_clionly "CliOnly-Version installieren")
-
- (set #msg_clionly
- (cat "Wenn Sie ListCopy nur ohne Oberfläche haben möchten, "
- "können Sie jetzt eine CliOnly-Version installieren. "
- "Sie sollten darauf achten, daß Sie diese Version in "
- "einem Verzeichnis mit eingestelltem Suchpfad ablegen. "
- "Dazu bietet sich z.B. das Verzeichnis C der Workbench an. "
- "Das ausgewählte Programm 'CliOnly' wird als 'ListCopy' in "
- "die von Ihnen gewählte Schublade kopiert. Die Programm-Version "
- "für Workbench- UND CLI-Start können Sie per Hand installieren, "
- "indem Sie die entsprechenden Piktogramme verschieben."
- )
- )
-
-
- ; ****************************************
- ; Version der Workbench bestimmen
- ; ****************************************
-
- (set #os_version (/ (getversion "libs:version.library") 65536))
-
- ; ****************************************
- ; Beginn der Installation
- ; ****************************************
-
- (complete 0)
-
- ; ****************************************
- ; Prüfen, ob richtiges Betriebsystem
- ; ****************************************
-
- (if (< #os_version 37)
- (
- (abort #bad-kick)
- ))
-
- ; ****************************************
- ; Eine kleine Nachricht
- ; ****************************************
-
- (message #msg_clionly)
-
- ; ****************************************
- ; Zielverzeichnis auswählen lassen
- ; ****************************************
-
- (set #destname
- (askdir
- (prompt "In welche Schublade soll die CliOnly-Version von ListCopy kopiert werden ? Eine Schublade wird NICHT erzeugt !")
- (help @askdir-help)
- (default #destname)
- )
- )
-
- (complete 30)
-
- ; ****************************************
- ; Kopieren des Programmes
- ; ****************************************
-
- (copyfiles (prompt #copy-programm)
- (help #help-programm)
- (source #prgsource)
- (newname #prgdest)
- (dest #destname)
- (confirm "expert")
- )
-
- (complete 100)
-
- ; ****************************************
- ; Aktuelles Verzeichnis setzen
- ; ****************************************
-
- (set @default-dest
- (#destname)
- )
-
- ; *************************************************************************
- ; End Of Installation-Script
- ; *************************************************************************
-
-